% V20210224 - 7.7.1 align

INCLUDE "GW.bas"

p = GW_NEW_PAGE()

% Prepare title bar string.
Title$ = gw_add_bar_title$("Align Example")

% Left button for title bar.
GW_USE_THEME_CUSTO_ONCE("icon=power iconpos=left")
LB$=GW_ADD_BAR_LBUTTON$("Exit>Exit")

% Add title to page.
GW_ADD_TITLEBAR(p,LB$ + Title$)

GW_USE_THEME_CUSTO_ONCE("align=left")
GW_ADD_TEXT(p, "I'm a left-aligned TEXT")

GW_USE_THEME_CUSTO_ONCE("align=center")
GW_ADD_TEXT(p, "I'm a centered TEXT")

GW_USE_THEME_CUSTO_ONCE("align=right")
GW_ADD_TEXT(p, "I'm a right-aligned TEXT")

GW_USE_THEME_CUSTO_ONCE("align=justify")
GW_ADD_TEXT(p, "I'm a justify-aligned TEXT."+~
"  I'm a justify-aligned TEXT.")

GW_USE_THEME_CUSTO_ONCE("align=left")
GW_ADD_TEXTBOX(p, "I'm a left-aligned TEXTBOX")

%GW_USE_THEME_CUSTO_ONCE("align=center")
%GW_ADD_TEXTBOX(p, "I'm a centered TEXTBOX")

GW_USE_THEME_CUSTO_ONCE("align=right")
GW_ADD_TEXTBOX(p, "I'm a right-aligned TEXTBOX")

%GW_USE_THEME_CUSTO_ONCE("align=justify")
%GW_ADD_TEXTBOX(p,"I'm a justify-aligned TEXT."+~
%"  I'm a justify-aligned TEXT.")

GW_USE_THEME_CUSTO_ONCE("align=left")
GW_ADD_TITLE(p, "I'm a left-aligned TITLE")

GW_USE_THEME_CUSTO_ONCE("align=center")
GW_ADD_TITLE(p, "I'm a centered TITLE")

GW_USE_THEME_CUSTO_ONCE("align=right")
GW_ADD_TITLE(p, "I'm a right-aligned TITLE")

GW_RENDER(p)

% Wait for user action.
r$ = GW_WAIT_ACTION$()

END "End of Align example."